-- card: 9925 from stack: in -- bmap block id: 0 -- flags: 4000 -- background id: 4755 -- name: contents (cont) ----- HyperTalk script ----- -- modified version for only 18 hot fields on updateContents global deletedCard put 36*((the number of me)-(the number of card "contents")) into base set cursor to watch put 4 into firstField repeat with x = 1 to 18 get line x+base of card field "content list" of card "contents" if it is word 3 of deletedCard then put "" into line x+base of card field "content list" of card "contents" get "" end if if it is "" then put "" into card field (2*x+firstField) of card (the number of me) put "" into card field (2*x-1+firstField) of card (the number of me) else put the number of card id it into card field (2*x-1+firstField) of card (the number of me) put it into card field (2*x+firstField) of card (the number of me) get field "heading" of card id it put it into word 1 of card field (2*x+firstField) of card (the number of me) end if end repeat put (the number of me) + 1 into nextCard get the name of card nextCard get word 2 of it get char 2 to 9 of it if it is "contents" then send updateContents to card nextCard end if end updateContents -- part 26 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=7 top=57 right=300 bottom=502 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: -- part 14 (field) -- low flags: 80 -- high flags: 0000 -- rect: left=141 top=21 right=36 bottom=237 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: bookmark1 -- part 20 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=232 top=37 right=55 bottom=469 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: instructions -- part 24 (field) -- low flags: 80 -- high flags: 0000 -- rect: left=237 top=21 right=36 bottom=333 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: bookmark2 -- part 25 (field) -- low flags: 80 -- high flags: 0000 -- rect: left=333 top=21 right=36 bottom=429 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: bookmark3 -- part 29 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=60 right=74 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 28 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=60 right=74 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 31 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=73 right=87 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 30 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=73 right=87 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 33 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=86 right=100 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 32 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=86 right=100 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 35 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=99 right=113 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 34 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=99 right=113 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 37 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=112 right=126 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 36 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=112 right=126 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 39 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=125 right=139 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 38 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=125 right=139 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 44 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=138 right=151 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 43 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=138 right=152 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 46 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=151 right=165 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 45 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=151 right=165 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 48 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=164 right=178 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 47 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=164 right=178 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 50 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=177 right=191 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 49 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=177 right=191 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 52 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=190 right=203 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 51 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=190 right=204 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 54 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=203 right=217 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 53 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=203 right=217 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 56 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=216 right=230 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 55 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=216 right=230 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 58 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=229 right=243 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 57 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=229 right=243 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 60 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=242 right=255 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 59 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=242 right=256 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 62 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=255 right=268 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 61 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=255 right=269 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 64 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=268 right=282 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 63 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=268 right=282 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 66 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=451 top=281 right=295 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: -- part 65 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=14 top=281 right=295 bottom=494 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: ----- HyperTalk script ----- on mouseUp visual iris open get the number of the target get card field (it-1) if it is not "" then -- added following to return to card global xrefdepth add 1 to xrefdepth push card show background button "return" go card it end if end mouseUp -- part 130 (button) -- low flags: 80 -- high flags: A003 -- rect: left=352 top=26 right=43 bottom=475 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Add Contents Pg. ----- HyperTalk script ----- on mouseUp put the userLevel into currentLevel set the userLevel to 5 doMenu "Copy Card" doMenu "Paste Card" put "" into field "page no" send updateContents to this card set the userLevel to currentLevel end mouseUp -- part contents for card part 14 ----- text ----- card id 4342 -- part contents for background part 4 ----- text ----- -- part contents for card part 24 ----- text ----- 0 -- part contents for card part 25 ----- text ----- 0 -- part contents for background part 6 ----- text ----- List of Code Examples -- part contents for card part 29 ----- text ----- 17 -- part contents for card part 28 ----- text ----- Simple Person class example -- part contents for card part 33 ----- text ----- 40 -- part contents for card part 32 ----- text ----- Derivation of Student class from Person class -- part contents for card part 37 ----- text ----- 82 -- part contents for card part 36 ----- text ----- Example of user-defined data types -- part contents for card part 44 ----- text ----- 103 -- part contents for card part 43 ----- text ----- Example of recursion, multiple source files -- part contents for card part 48 ----- text ----- 131 -- part contents for card part 47 ----- text ----- Object-oriented program using multiple source and header files -- part contents for card part 52 ----- text ----- 205 -- part contents for card part 51 ----- text ----- Portable graphics class and Macintosh version -- part contents for card part 56 ----- text ----- 210 -- part contents for card part 55 ----- text ----- Root class for TC using automated constructors/destructors -- part contents for background part 7 ----- text ----- 4 -- part contents for card part 20 ----- text ----- (click on the topic or page no. of interest)